Erect Magazine 6/Erect Magazine 6.iso/pc/menu.mmm/meta.txt

Text File | 1995-10-12 | 4.9 KB | 42 lines

Name
----
Menue□Max:

Strings
------
Macromedia Director

Script Channel Commands
--------------------
Global Config_G
put 0 into item 1 of Config_G
--
put clickOn() - 10 into clickOn_W
set the visibility of sprite clickOn_W = TRUE
put clickOn() - 9 into clickOn_W
set the visibility of sprite clickOn_W = FALSEgo to the frameGlobal Config_G
put 1 into item 1 of Config_G
--
put clickOn() - 10 into clickOn_W
set the visibility of sprite clickOn_W = TRUE
put clickOn() - 11 into clickOn_W
set the visibility of sprite clickOn_W = FALSEnothingGlobal Config_G
put 0 into item 2 of Config_G
--
put clickOn() - 10 into clickOn_W
set the visibility of sprite clickOn_W = TRUE
put clickOn() - 9 into clickOn_W
set the visibility of sprite clickOn_W = FALSEgo to the frame + 1Global Config_G
if machineType() = 256 and the colorDepth <= 8 then
    alert "Please Change of Display !!"
else
    put 1 into item 2 of Config_G
    --
    put clickOn() - 10 into clickOn_W
    set the visibility of sprite clickOn_W = TRUE
    put clickOn() - 11 into clickOn_W
    set the visibility of sprite clickOn_W = FALSE
end ifpuppetSound "MenuBGM"
--
go to "Menu"Wtime 0.5Global Dmovie_G
go to movie Dmovie_Gif soundBusy(1) then
    nothing
else
    Global Config_G
    put 255/5*integer(item 3 of Config_G) into Volume_W
    set the volume of sound 1 = Volume_W
    updatestage
    --
    puppetSound "MenuBGM"
end ifgo to "Menu"Global Dmovie_G
if the mouseH < 268 then
    put "MovieBR1" into Dmovie_G
    set the visibility of sprite 12 = TRUE
    puppetSound "ClickSND"
    go to "Dmovie"
else
    if the mouseH > 417 then
        put "MovieBR2" into Dmovie_G
        set the visibility of sprite 13 = TRUE
        puppetSound "ClickSND"
        go to "Dmovie"
    else
        go to the frame
    end if
end ifGlobal Config_G
repeat with n = 1 to 24
    set the visibility of sprite n = TRUE
end repeat
--
repeat with n = 2 to 11
    set the visibility of sprite n = FALSE
end repeat
--MovieSize
if item 1 of Config_G = 0 then
    set the visibility of sprite 2 = TRUE
else
    set the visibility of sprite 3 = TRUE
end if
--PhotoSize
if item 2 of Config_G = 0 then
    set the visibility of sprite 4 = TRUE
else
    set the visibility of sprite 5 = TRUE
end if
--SoundVolume
put item 3 of Config_G + 6 into SV_W
set the visibility of sprite SV_W = TRUE
updatestagerepeat with n = 6 to 11
    set the visibility of sprite n = FALSE
end repeat
--
put clickOn()-10 into Volume_W
set the visibility of sprite Volume_W = TRUE
--
Global Config_G
put Volume_W-6 into item 3 of Config_G
--
if item 3 of Config_G > 0 then
    put 255/5*integer(item 3 of Config_G) into Volume_W
    set the volume of sound 1 = Volume_W
else
    set the volume of sound 1 = 0
end ifquitpuppetSound 0
--
put clickOn() into clickOn_W
set the visibility of sprite clickOn_W = FALSE
updatestage
Wtime 0.3
set the visibility of sprite clickOn_W = TRUE
updatestage
Wtime 0.1
--
go to "Panic"put clickOn() into clickOn_W
set the visibility of sprite clickOn_W = FALSE
updatestage
Wtime 0.3
set the visibility of sprite clickOn_W = TRUE
updatestage
Wtime 0.1
--
go to "Config"put clickOn() into clickOn_W
set the visibility of sprite clickOn_W = FALSE
updatestage
Wtime 0.3
set the visibility of sprite clickOn_W = TRUE
updatestage
Wtime 0.1
--
go to "Quit"put clickOn() into clickOn_W
set the visibility of sprite clickOn_W = FALSE
updatestage
Wtime 0.3
set the visibility of sprite clickOn_W = TRUE
updatestage
Wtime 0.1
--
go to the frame + 1Global Dmovie_G
put "PhotoBr3" into Dmovie_G
set the visibility of sprite 16 = TRUE
--
puppetSound "ClickSND"
go to "Dmovie"Global Dmovie_G
if the mouseH < 384 then
    put "MovieBr3" into Dmovie_G
    set the visibility of sprite 17 = TRUE
else
    put "PhotoBr4" into Dmovie_G
    set the visibility of sprite 18 = TRUE
end if
--
puppetSound "ClickSND"
go to "Dmovie"Global Dmovie_G
if the mouseV < 370 then
    put "PhotoBR1" into Dmovie_G
    set the visibility of sprite 14 = TRUE
else
    put "PhotoBR2" into Dmovie_G
    set the visibility of sprite 15 = TRUE
end if
--
puppetSound "ClickSND"
go to "Dmovie"Global Dmovie_G
put "MovieBr4" into Dmovie_G
set the visibility of sprite 19 = TRUE
--
puppetSound "ClickSND"
go to "Dmovie"Global Dmovie_G
put "PhotoBr5" into Dmovie_G
set the visibility of sprite 20 = TRUE
--
puppetSound "ClickSND"
go to "Dmovie"Global Dmovie_G
put "BackNum" into Dmovie_G
set the visibility of sprite 21 = TRUE
--
puppetSound "ClickSND"
go to "Dmovie"repeat with n = 1 to 24
    set the visibility of sprite n = TRUE
end repeat
--
repeat with n = 12 to 21
    set the visibility of sprite n = FALSE
end repeat
updatestage

vwci
----
1025: □MenuPal
1026: □Menu_N
1027: □MBPanic
1028: □MBConfig
1029: □MBQuit
1030: □MBMovie
1031: □MBPhoto
1032: □MBSCAN
1033: □MBErect
1034: □ConPal
1035: □Config
1036: □ConMB
1037: □ConMS
1038: □ConP
1039: □ConP256
1040: □ConV0
1041: □ConV1
1042: □ConV2
1043: □ConV3
1044: □ConV4
1045: □ConV5
1046: □Cmenu
1047:     BlackBoad
1048: □Loading
1049: □PanicG
1052: □MenuBGM
1053: □ClickSND